home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Fritz: All Fritz
/
All Fritz.zip
/
All Fritz
/
FILES
/
AVIATHER
/
WXRDR30.LZH
/
RDR.DNL
< prev
next >
Wrap
Text File
|
1988-02-06
|
870b
|
37 lines
START:
CLEAR
EMULATE ANSI
SET ENQ OFF
DIAL "xx" 'place your directory number for wbank here
IF NOT CONNECTED
CLEAR
GOTO END
ENDIF
TRANSMIT "!"
TRANSMIT "!"
TRANSMIT "!"
WAITFOR "please:"
TRANSMIT "LOGON x,xxxxx,xxxxx" 'place your logon instructions here
WAITFOR "READY:" 'OR whatever your prompt selection is.
LOG OPEN "c:\wxrdr\RADAR.DAT"
TRANSMIT "RADAR/L!"
WAITFOR "READY:" 'OR whatever your prompt selection is.
LOG CLOSE
LOG OPEN "c:\wxrdr\WEATHER.DTA"
TRANSMIT "NWS LEX,2,74,80!"
WAITFOR "READY:" 'OR ...
TRANSMIT "NWS SDF,6,7,80,110,113,119,122!"
WAITFOR "READY:"
TRANSMIT "HOURLY/Y- LEX!"
WAITFOR "READY:"
TRANSMIT "WBI CKY!"
WAITFOR "READY:"
TRANSMIT "WBI PPN!"
WAITFOR "READY:"
TRANSMIT "WBI 6EC!"
WAITFOR "READY:"
LOG CLOSE
TRANSMIT "OFF!"
END:
QUIT